/*
 * Peralta Santa Anna Victor Miguel
 * Diciembre 2011
 * Stored Procedure:
 *
 * Buscamos un usuario Y regresamos el correo.
 */
 
CREATE OR REPLACE FUNCTION getUsuarioCorreoPrimario
	(username VARCHAR) 

	RETURNS VARCHAR AS $$
	
	DECLARE usuario1 INTEGER;
	DECLARE correo1 VARCHAR;
	
	BEGIN
	
		SELECT INTO usuario1 nidusuario 
			FROM usuarios
		WHERE usuarios.susuario LIKE username;
	
		SELECT INTO correo1 scorreo 
			FROM correos
		WHERE correos.nidusuario = usuario1
		ORDER BY nidcorreo
		LIMIT 1;
		
		
		RETURN correo1;
		
	END;
$$ LANGUAGE plpgsql;

--select isUsuario('v1ctor');

